-- @owner: @nanyang12
-- @date: 2025/4/1
-- @testpoint:使用postgresql风格创建自定义函数，指定language为pltsql

--连接D库
@conn PrimaryDbDmode;
--创建插件
--create extension shark;
--创建函数，成功
drop function if exists func_0011;
create or replace function func_0011()
returns int
as
$$
declare
 i int;
begin
 i := 0;
 while i < 100 loop
 i := i + 1;
 end loop;
 return i;
end;
$$
language pltsql;
/
--调用函数，成功
select func_0011();
--通过系统表查询函数信息，成功
select l.lanname from pg_language l join pg_proc p on l.oid = p.prolang and p.proname in ('func_0011');
--清理环境
drop function if exists func_0011;